/************************************************************************
  Scheme interpreter

  Copyright (C) 2010 Marioly Garza 

  This program is free software: you can redistribute it and/or modify
  it under the terms of the GNU Lesser General Public License as
  published by the Free Software Foundation, either version 3 of the
  License, or (at your option) any later version.

  This program is distributed in the hope that it will be useful, but
  WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  Lesser General Public License for more details.

  You should have received a copy of the GNU Lesser General Public
  License along with this program. If not, see
  <http://www.gnu.org/licenses/>.

 ************************************************************************/

#include <cstdlib>
#include <iostream>
#include "scheme.h"

int main(int argc, char *argv[])
{
    scheme::vsymbols = symbols::get_instance();

    environment *env = new environment(std::list<object*>(), std::list<object*>(), NULL);

    std::cout << "Scheme interpreter 0.010, visit: http://marioly.hackerss.com for info." << std::endl;

    scheme::read_input(&std::cin, &std::cout, env);

    delete env;
    delete scheme::vsymbols;

    return EXIT_SUCCESS;
}
